home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 247 / 247.d81 / e.scr rep < prev    next >
Encoding:
Text File  |  2004-01-01  |  504 b   |  28 lines
  1. u                            PRINT THIS
  2.  
  3.          SCRATCH AND REPLACE
  4.          -------------------
  5.  
  6.  
  7.  Version 1:
  8.  
  9.   60000 OPEN4,8,4,"I0":N$="FILENAME"
  10.   60001 PRINT#1,"S0:"+N$:CLOSE1
  11.   60002 SAVEN$,8:END
  12.  
  13.  
  14.  Version 2:
  15.  
  16.   60000 OPEN4,8,4,"I0":N$="FILENAME"
  17.   60001 PRINT#1,"R0:"+N$+"3="+N$+"2"
  18.   60002 PRINT#1,"R0:"+N$+"2="+N$+"1"
  19.   60003 PRINT#1,"R0:"+N$+"1="+N$
  20.   60004 SAVEN$,8
  21.   60005 VERIFYN$,8
  22.   60006 END
  23.  
  24.   The second version keeps the last
  25. four saves -- in case something goes
  26. terribly wrong!
  27.  
  28.  
  29.